object MainForm: TMainForm
  Left = 199
  Top = 114
  Caption = 'Force feed back sample'
  ClientHeight = 264
  ClientWidth = 428
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 16
    Width = 310
    Height = 13
    Caption = 
      'Push button 1, you can get the feeling as shotting a machine gun' +
      '.'
  end
  object Timer: TTimer
    Interval = 50
    OnTimer = TimerTimer
    Left = 152
    Top = 96
  end
  object DXInput1: TDXInput
    ActiveOnly = True
    Joystick.BindInputStates = True
    Joystick.Effects.Effects = {
      FF0A0044454C50484958464F524345464545444241434B454646454354003010
      A9010000545046301D54466F726365466565646261636B456666656374436F6D
      706F6E656E74025F3107456666656374730E01044E616D650607456666656374
      730A45666665637454797065070665744E6F6E6506506572696F64023205506F
      7765720310270454696D6503E8030E537461727444656C617954696D65020007
      456666656374730E01044E616D65060B4D616368696E652067756E0A45666665
      637454797065070665744E6F6E6506506572696F64023205506F776572031027
      0454696D6503E8030E537461727444656C617954696D65020007456666656374
      730E01044E616D650607766962726174650A45666665637454797065070A6574
      506572696F64696309436F6E7374616E745903A00F06506572696F6402500550
      6F7765720310270454696D6503E8030E537461727444656C617954696D650200
      0001044E616D6506087265616374696F6E0A45666665637454797065070F6574
      436F6E7374616E74466F72636509436F6E7374616E745903401F06506572696F
      64023205506F7765720310270454696D6503E8030E537461727444656C617954
      696D6502000000000000000000}
    Joystick.Enabled = True
    Joystick.ForceFeedback = True
    Joystick.AutoCenter = True
    Joystick.DeadZoneX = 0
    Joystick.DeadZoneY = 0
    Joystick.DeadZoneZ = 0
    Joystick.ID = 0
    Joystick.RangeX = 100
    Joystick.RangeY = 100
    Joystick.RangeZ = 100
    Keyboard.BindInputStates = True
    Keyboard.Effects.Effects = {
      FF0A0044454C50484958464F524345464545444241434B454646454354003010
      7F000000545046301D54466F726365466565646261636B456666656374436F6D
      706F6E656E74025F3107456666656374730E01044E616D650607456666656374
      730A45666665637454797065070665744E6F6E6506506572696F64023205506F
      7765720310270454696D6503E8030E537461727444656C617954696D65020000
      000000}
    Keyboard.Enabled = True
    Keyboard.ForceFeedback = False
    Keyboard.Assigns = {
      4B00000026000000680000004A00000028000000620000004800000025000000
      640000004C00000027000000660000005A000000200000000000000058000000
      0D00000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000071000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000}
    Mouse.BindInputStates = False
    Mouse.Effects.Effects = {
      FF0A0044454C50484958464F524345464545444241434B454646454354003010
      7D000000545046301D54466F726365466565646261636B456666656374436F6D
      706F6E656E740007456666656374730E01044E616D650607456666656374730A
      45666665637454797065070665744E6F6E6506506572696F64023205506F7765
      720310270454696D6503E8030E537461727444656C617954696D650200000000
      00}
    Mouse.Enabled = False
    Mouse.ForceFeedback = False
    UseDirectInput = True
    Left = 112
    Top = 96
  end
end
